tables and graphs for continuous variables
for (v in cont_vars){
print(paste0("summary stats: ", v))
print(summary_func(dt, "race", v, "sex"))
print(paste0("box plot: ", v))
print(boxplot_func(dt, "race", v, "sex"))
}
## [1] "summary stats: log_wagp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 10.1 9.60 10.3 10.8 1.39 13.5 1.16 62639
## 2 afr_am 1 10.0 9.55 10.2 10.7 3.00 13.5 1.06 72694
## 3 east_asian 0 10.8 10.1 10.9 11.5 4.09 13.5 1.16 14532
## 4 east_asian 1 10.5 9.90 10.6 11.2 3.00 13.3 1.13 14783
## 5 other 0 10.4 9.85 10.4 11.0 1.39 13.4 1.09 68148
## 6 other 1 10.1 9.57 10.2 10.8 1.39 13.5 1.08 56640
## 7 white 0 10.6 10.1 10.7 11.3 1.39 13.5 1.11 597178
## 8 white 1 10.2 9.74 10.4 10.9 1.39 13.5 1.05 516507
## [1] "box plot: log_wagp"

## [1] "summary stats: log_pincp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 10.2 9.64 10.3 10.9 0 13.7 1.15 64996
## 2 afr_am 1 10.1 9.63 10.3 10.8 0 13.7 1.02 74342
## 3 east_asian 0 10.8 10.1 10.9 11.6 0 14.1 1.15 15461
## 4 east_asian 1 10.5 9.90 10.7 11.3 0 13.8 1.12 15516
## 5 other 0 10.4 9.89 10.5 11.1 0 14.0 1.08 72041
## 6 other 1 10.1 9.62 10.2 10.8 0 13.8 1.06 59133
## 7 white 0 10.7 10.1 10.8 11.3 0 14.2 1.10 638874
## 8 white 1 10.3 9.85 10.5 11.0 0 13.8 1.03 540451
## [1] "box plot: log_pincp"

## [1] "summary stats: wagp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 38192. 12100 28800 50000 0 714000 44151. 65026
## 2 afr_am 1 34739. 13000 26000 45000 0 714000 38072. 74376
## 3 east_asi~ 0 74749. 20000 50000 100000 0 714000 87801. 15473
## 4 east_asi~ 1 54720. 16000 40000 74000 0 601000 62089. 15521
## 5 other 0 48387. 16000 31000 60000 0 665000 61270. 72068
## 6 other 1 37181. 12400 25000 48000 0 714000 44368. 59154
## 7 white 0 59734. 19900 41600 75000 0 714000 73849. 639350
## 8 white 1 41153. 15000 30400 53000 0 714000 46348. 540753
## [1] "box plot: wagp"

## [1] "summary stats: pincp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 42277. 15400 30000 54000 -10500 8.54e5 47812. 65026
## 2 afr_am 1 37587. 15115 29000 48000 -11900 9.28e5 40459. 74376
## 3 east_as~ 0 83154. 25000 55600 104000 -6600 1.26e6 95697. 15473
## 4 east_as~ 1 60083. 20000 43000 79800 -6700 9.53e5 67133. 15521
## 5 other 0 53062. 19800 35000 63000 -8400 1.16e6 66863. 72068
## 6 other 1 40005. 15000 27490 50000 -6700 9.92e5 47026. 59154
## 7 white 0 69577. 25100 48000 80000 -11800 1.54e6 83700. 639350
## 8 white 1 46062. 19000 35000 58000 -11800 1.02e6 50673. 540753
## [1] "box plot: pincp"

## [1] "summary stats: log_hr_wagp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 6.42 5.99 6.59 7.09 -2.30 10.3 1.06 62639
## 2 afr_am 1 6.42 5.99 6.55 7.03 -1.60 10.3 0.965 72694
## 3 east_asian 0 7.05 6.44 7.17 7.80 0.223 9.91 1.07 14532
## 4 east_asian 1 6.82 6.25 6.93 7.52 -0.0488 9.91 1.03 14783
## 5 other 0 6.65 6.17 6.68 7.30 -2.53 10.1 1.01 68148
## 6 other 1 6.47 6.01 6.55 7.11 -1.83 10.1 0.992 56640
## 7 white 0 6.84 6.39 6.91 7.47 -3.21 10.4 1.02 597178
## 8 white 1 6.61 6.21 6.73 7.20 -2.71 10.4 0.942 516507
## [1] "box plot: log_hr_wagp"

## [1] "summary stats: log_hr_pincp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 6.49 6.05 6.62 7.13 -4.09 10.3 1.06 64996
## 2 afr_am 1 6.50 6.09 6.62 7.09 -3.69 10.5 0.934 74342
## 3 east_asian 0 7.09 6.48 7.20 7.82 -4.25 10.4 1.08 15461
## 4 east_asian 1 6.86 6.31 6.98 7.56 -4.03 10.0 1.04 15516
## 5 other 0 6.68 6.21 6.72 7.31 -4.09 10.3 1.02 72041
## 6 other 1 6.51 6.05 6.58 7.13 -4.25 10.2 0.979 59133
## 7 white 0 6.93 6.44 7.01 7.54 -4.60 11.0 1.02 638874
## 8 white 1 6.69 6.25 6.79 7.26 -4.38 10.5 0.934 540451
## [1] "box plot: log_hr_pincp"

## [1] "summary stats: hr_wagp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 907. 357. 700 1176. 0 29150 1000. 65026
## 2 afr_am 1 876. 380 680 1120. 0 29750 959. 74376
## 3 east_asian 0 1729. 514. 1222. 2340 0 20033. 1922. 15473
## 4 east_asian 1 1335. 480 1000 1787. 0 20033. 1415. 15521
## 5 other 0 1133. 425 750 1380 0 25300 1333. 72068
## 6 other 1 934. 375 667. 1175 0 25200 1037. 59154
## 7 white 0 1345. 500 982. 1660 0 33250 1587. 639350
## 8 white 1 1019. 440 800 1300 0 33250 1054. 540753
## [1] "box plot: hr_wagp"

## [1] "summary stats: hr_pincp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 1016. 425 750 1250 -420 29150 1111. 65026
## 2 afr_am 1 958. 442. 750 1200 -300 37450 1046. 74376
## 3 east_asian 0 1938. 650 1333. 2500 -300 31625 2131. 15473
## 4 east_asian 1 1481. 550 1076 1917. -290 22430 1569. 15521
## 5 other 0 1248. 500 825 1500 -300 29025 1467. 72068
## 6 other 1 1010. 425 720 1250 -236 25630 1103. 59154
## 7 white 0 1591. 625 1104. 1875 -355 61404 1869. 639350
## 8 white 1 1158. 520 889. 1429. -415 35950 1198. 540753
## [1] "box plot: hr_pincp"

## [1] "summary stats: wkhp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 40.7 40 40 40 20 99 10.6 65026
## 2 afr_am 1 38.5 35 40 40 20 99 9.30 74376
## 3 east_asian 0 42.0 40 40 45 20 99 10.6 15473
## 4 east_asian 1 39.6 36 40 40 20 99 10.5 15521
## 5 other 0 41.6 40 40 42 20 99 10.2 72068
## 6 other 1 38.4 35 40 40 20 99 9.56 59154
## 7 white 0 43.0 40 40 50 20 99 10.9 639350
## 8 white 1 38.6 35 40 40 20 99 9.73 540753
## [1] "box plot: wkhp"

## [1] "summary stats: agep"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 41.7 29 41 53 16 95 14.5 65026
## 2 afr_am 1 42.3 30 42 54 16 94 14.2 74376
## 3 east_asian 0 43.5 32 44 54 16 94 13.6 15473
## 4 east_asian 1 43.1 32 43 53 16 95 13.4 15521
## 5 other 0 40.2 29 39 50 16 94 13.3 72068
## 6 other 1 40.4 29 40 50 16 95 13.3 59154
## 7 white 0 44.0 32 45 56 16 96 14.8 639350
## 8 white 1 43.7 31 45 55 16 96 14.5 540753
## [1] "box plot: agep"

## [1] "summary stats: exp"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 23.4 11 23 35 -7 90 14.6 65026
## 2 afr_am 1 23.4 11 23 35 -4 87 14.4 74376
## 3 east_asian 0 23.0 11 22 34 -4 89 14.4 15473
## 4 east_asian 1 23.0 10 22 34 -7 90 14.5 15521
## 5 other 0 22.3 11 21 33 -5 82 14.1 72068
## 6 other 1 22.1 10 21 33 -5 88 14.1 59154
## 7 white 0 25.1 12 25 37 -7 90 14.8 639350
## 8 white 1 24.4 11 25 36 -7 84 14.8 540753
## [1] "box plot: exp"

## [1] "summary stats: schl_yrs"
## # A tibble: 8 x 10
## # Groups: race [?]
## race sex mean quart_1 median quart_3 min max sd n
## <chr> <int> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
## 1 afr_am 0 13.3 12 12 14 0 23 2.61 65026
## 2 afr_am 1 13.8 12 14 16 0 23 2.63 74376
## 3 east_asian 0 15.5 14 16 18 0 23 4.11 15473
## 4 east_asian 1 15.2 14 16 18 0 23 3.86 15521
## 5 other 0 12.8 12 12 16 0 23 4.14 72068
## 6 other 1 13.3 12 14 16 0 23 3.77 59154
## 7 white 0 13.9 12 14 16 0 23 2.95 639350
## 8 white 1 14.3 12 14 16 0 23 2.72 540753
## [1] "box plot: schl_yrs"

tables and graphs for continuous variables
combos <- combn(cont_vars, 2)
for (cmb in 1:ncol(combos)){
print(scatter_func(x_var=combos[,cmb][1],
y_var=combos[,cmb][2],
by_var="race"))
}

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]

## TableGrob (2 x 1) "arrange": 2 grobs
## z cells name grob
## 1 1 (1-1,1-1) arrange gtable[layout]
## 2 2 (2-2,1-1) arrange gtable[arrange]